home *** CD-ROM | disk | FTP | other *** search
GW-BASIC | 1987-05-08 | 578 b | 16 lines |
- 10 CLS
- 20 KEY OFF
- 30 COLOR 7,0
- 40 WIDTH 80
- 50 DEF SEG = 0: POKE 1050,PEEK(1052)
- 60 LOCATE 1,30:PRINT "P R I N T E R U S E "
- 70 LOCATE 3,2:PRINT "This section shows the user how to obtain a screen printout of "
- 80 LOCATE 4,2:PRINT "what is currently being shown on the screen. This is accomplished by"
- 90 LOCATE 5,2:PRINT "simultaneously pressing the 'SHIFT' and 'PRTSC' keys."
- 100 LOCATE 7,2:PRINT "The user will be able to get printouts of the main menu,tutorial"
- 110 LOCATE 8,2:PRINT "sections,and final calculations."
- 120 LOCATE 20,2:PRINT "Press the S P A C E B A R to return to disk tutorial..."
- 130 S$ =INKEY$:IF S$ =" " THEN CLS:CLEAR:CHAIN"a"
- 140 GOTO 130
- 150 END
-